
set DROOT $env(PWD)

set design_syn_flist_path $DROOT/delay_dc.flist
set designs_search_path [ concat \
						$DROOT bbb \
						aaa \
					 ]
puts $designs_search_path
# quit
source xxx.tcl
puts $dc_shell_status
puts $b
set a "bbb"
puts $a
puts "aaaa"

# exit
puts "bbbb"
